home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / dutch / brief.sty < prev    next >
Text File  |  1993-01-11  |  23KB  |  570 lines
  1. % This is BRIEF.STY in text format
  2. % following Dutch NEN-norms 1025, 1026, and 3162.
  3. \def\stijlversie{0.8}\def\stijldatum{6 januari 1990}
  4. % Een Nederlandse briefstijl. 
  5. % Deze stijl bevat meer commando's dan de LaTeX 'letter' stijl,
  6. % maar op geforceerde wijze (zie het einde van dit bestand)
  7. % is ervoor gezorgd dat een brief die met 'letter' gemaakt is,
  8. % ook door 'brief' kan rollen.
  9. %
  10. % Auteur:
  11. %    Victor Eijkhout
  12. %    Mathematisch Instituut
  13. %    Universiteit van Nijmegen
  14. %    Toernooiveld 5
  15. %    6525 ED  Nijmegen
  16. %    the Netherlands.
  17. %
  18. %    u641000@hnykun11.bitnet
  19. %
  20. %\advance\voffset by 2cm %% voor domme previewer.
  21. \typeout{Document Stijl 'Brief'. Versie <\stijlversie>, <\stijldatum>}
  22. \def\@ptsize{1} 
  23. \@namedef{ds@10pt}{\def\@ptsize{0}}
  24. \@namedef{ds@11pt}{\def\@ptsize{1}}
  25. \@namedef{ds@12pt}{\def\@ptsize{2}}
  26. \@twosidefalse
  27. \def\ds@draft{\overfullrule 5pt}
  28. \@namedef{ds@a4}{\message{De A4-optie is niet nodig:
  29. ik doe de papierafmetingen zelf.}}\def\ds@sober{}
  30. \newif\if@typhulp \def\ds@typhulp{\@typhulptrue}
  31. \newif\if@streepjes \def\ds@streepjes{\@streepjestrue}
  32. \newif\if@adresrechts \def\ds@adresrechts{\@adresrechtstrue}
  33. \newcount\language \language=0 % Nederlands
  34. \def\ds@engels{\language=1}
  35. \def\ds@USengels{\language=2}
  36. \def\ds@duits{\language=3}
  37. \@options
  38. \lineskip 1pt \normallineskip 1pt
  39. \def\baselinestretch{1}
  40. %%%%%%%%%%%%%%%%%%%%%%% point size %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
  41. \ifcase \@ptsize\relax
  42. \def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt
  43. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  44. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
  45. \def\small{\@setsize\small{11pt}\ixpt\@ixpt
  46. \abovedisplayskip 8.5pt plus 3pt minus 4pt\belowdisplayskip \abovedisplayskip
  47. \abovedisplayshortskip \z@ plus2pt\belowdisplayshortskip 4pt plus2pt minus 2pt}
  48. \def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt
  49. \abovedisplayskip 6pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
  50. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 3pt plus 1pt minus
  51. 2pt}
  52. \def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
  53. \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
  54. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  55. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
  56. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
  57. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  58. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  59. \or
  60. \def\@normalsize{\@setsize\normalsize{13.6pt}\xipt\@xipt
  61. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
  62. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  63. minus3pt}
  64. \def\small{\@setsize\small{12pt}\xpt\@xpt
  65. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  66. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
  67. \def\footnotesize{\@setsize\footnotesize{11pt}\ixpt\@ixpt
  68. \abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
  69. \abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus
  70. 2pt}
  71. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
  72. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
  73. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  74. \def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
  75. \def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
  76. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  77. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  78. \or
  79. \def\@normalsize{\@setsize\normalsize{15pt}\xiipt\@xiipt
  80. \abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip
  81. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  82. minus3pt}
  83. \def\small{\@setsize\small{13.6pt}\xipt\@xipt
  84. \abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
  85. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
  86. minus3pt}
  87. \def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
  88. \abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
  89. \abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
  90. \def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
  91. \def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
  92. \def\large{\@setsize\large{18pt}\xivpt\@xivpt}
  93. \def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
  94. \def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
  95. \def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
  96. \let\Huge=\huge
  97. \fi
  98. \normalsize
  99. %%%%%%%%%%%%%%%%%%%%%% Paper Size %%%%%%%%%%%%%%%%%%%%%%%%%%
  100. %V forceer 33mm linker marge
  101. \oddsidemargin=7.6mm \evensidemargin=\oddsidemargin
  102. %V rechter marge is volgens NEN 10mm; voor symmetrie lijkt 33 mij beter.
  103. \textwidth=144mm \@rightskip=0cm plus 5cm \rightskip=\@rightskip
  104. %\textwidth=167mm \rightskip=0cm plus 5cm%%%%%%%%%overfull?????????
  105. %V geen margin notes.
  106. \marginparwidth=0pt \marginparsep=0pt \marginparpush=0pt
  107. %V top margin 13mm
  108. \topmargin-12.4mm 
  109. %V het briefhoofd komt tot 50mm van de bovenkant van het papier
  110. \headheight=37mm \headsep=0mm
  111. \newdimen\@firstheadheight \@firstheadheight=\headheight
  112. \newdimen\@otherheadheight \@otherheadheight=\headheight 
  113. \newdimen\@otherheadsep \@otherheadsep=2mm
  114. \newdimen\@vervolgsep
  115. %V voldoende scheiding tussen tekst en voetregel
  116. \newdimen\footsep \footsep=1.5cm %%analoog aan headsep
  117. %\footheight 12pt \footskip25pt %worden elders gezet.
  118. %V text height is wat er over is
  119. %\textheight=217mm %V dit kan vast beter.
  120. \textheight=197mm %V op het timmermansoog
  121. \newdimen\@othertextheight \@othertextheight=\textheight
  122. \columnsep 10pt \columnseprule 0pt %V twee koloms brieven? belachelijk!
  123. %%\flushbottom 
  124. \raggedbottom %% hm! zonder raggedbottom gaat het slot mis.
  125. %%%%%%%%%%%%%V we'll get to this later
  126. \footnotesep 12pt \skip\footins 10pt plus 2pt minus 4pt
  127. \floatsep 12pt plus 2pt minus 2pt
  128. \textfloatsep 20pt plus 2pt minus 4pt
  129. \intextsep 12pt plus 2pt minus 2pt
  130. \dblfloatsep 12pt plus 2pt minus 2pt
  131. \dbltextfloatsep 20pt plus 2pt minus 4pt
  132. \@maxsep 20pt
  133. \@dblmaxsep 20pt
  134. \@fptop 0pt plus 1fil
  135. \@fpsep 8pt plus 2fil
  136. \@fpbot 0pt plus 1fil
  137. \@dblfptop 0pt plus 1fil
  138. \@dblfpsep 8pt plus 2fil
  139. \@dblfpbot 0pt plus 1fil
  140. %%%%%%%%%%%%%%%%%%%%%%%%%%% opening / afsluiting %%%%%%%%%%%%%%%%%%%%%
  141. \font\refkopfont=cmssq8
  142. \font\kleinvet=cmbx7
  143. \def\opening#1{\thispagestyle{firstpage}
  144.                \adresveld 
  145.                \prevdepth=-1000pt \vskip-2pt %% ????
  146.                \referentieregel
  147.                \@dosubject #1\par\nobreak}
  148. \def\ondertekening#1{\def\fromsig{#1}}\def\fromsig{}
  149. %V een aanzienlijke verbetering op de LL constructie: nu kun je
  150. %V de ondertekening na de afsluiting geven.
  151. \long\def\afsluiting#1{\par\nobreak\vspace{\parskip}
  152.  \stopbreaks \noindent
  153.  \ifx\@empty\fromsig
  154.      \def\ondertekening##1{\def\fromsig{##1}
  155.          \parbox{.5\textwidth}{\raggedright
  156.                  \ignorespaces #1\\[6\parskip] \fromsig \strut}}
  157.  \else \parbox{.5\textwidth}{\raggedright
  158.          \ignorespaces #1\\[6\parskip]
  159.          \fromsig \strut}
  160.  \fi \par}
  161. \def\betreft#1{\def\@subject{#1}} \def\@subject{}
  162. \def\@dosubject{\ifx\@empty\@subject
  163.     \else \par\noindent
  164.     \parbox[t]{\textwidth}{\@hangfrom{\refkopfont \betrefttekst
  165.     \enspace}\ignorespaces \rm \@subject\strut}\par\fi}
  166. \def\ps{\par\startbreaks}
  167. \def\cc#1{\par\noindent
  168.     \parbox[t]{\textwidth}{\@hangfrom{\rm cc: }\ignorespaces 
  169.     #1\strut}\par}
  170. \def\bijlage#1{\par\noindent
  171.     \parbox[t]{\textwidth}{\@hangfrom{\rm \bijlagetekst\ }\ignorespaces 
  172.     #1\strut}\par}
  173. \def\bijlagen#1{\par\noindent
  174.     \parbox[t]{\textwidth}{\@hangfrom{\rm \bijlagentekst\ }\ignorespaces 
  175.     #1\strut}\par}
  176. \def\stopletter{}
  177. \long\def\brief#1{\newpage
  178.  \c@page\@ne
  179.  \interlinepenalty=200 \@processto{#1}
  180.  \@defrefveld{\@Ad}{\geadresseerdetekst}{\toname}
  181.  \ifdim\wd\@Dt=0cm \@defrefveld{\@Dt}{\datumtekst}{\vandaag}\fi
  182. %% misschien headheight opvoeren en textheight verminderen
  183. %% voor de vervolgbladen. Nb: op het eerste blad mag niet met
  184. %% de textheight geklooid worden, omdat dan het adres op de
  185. %% verkeerde hoogte kan komen.
  186.  {\setbox\@tempboxa=\vervolghoofd
  187.   \@tempdima=\ht\@tempboxa
  188.   \advance\@tempdima by -\@otherheadheight 
  189.   \ifdim\@tempdima>0cm 
  190.         \global\advance\@otherheadheight by \@tempdima
  191.         \global\advance\@othertextheight by -\@tempdima \fi}
  192. %% idem voetregel bekijken
  193.  {\setbox\@tempboxa=\vbox{\voetregel}
  194.   \global\footskip=\ht\@tempboxa %%moet de teksthoogte niet minder worden?
  195.   \global\advance\footskip by \footsep}
  196.  } %V maar niet als die er als is!!!
  197. \def\endbrief{\stopletter\@@par\pagebreak\@@par
  198.  \if@filesw \begingroup
  199.      \def\protect{\string} \let\\=\relax
  200.      \def\protect##1{\string##1\space}
  201.      \immediate\write\@auxout{\string\mlabel{\returnaddress}{\toname
  202.      \\\toaddress}}
  203.  \endgroup \fi
  204.  %% en nu forceren dat elke brief zijn eigen referenties heeft.
  205.  \begingroup \setbox\@tempboxa=\box\@UB \setbox\@tempboxa=\box\@UK
  206.              \setbox\@tempboxa=\box\@OK \endgroup
  207.  }
  208. \long\def\@processto#1{\@xproc #1\\@@@\ifx\toaddress\@empty
  209.  \else \@yproc #1@@@\fi}
  210. \long\def\@xproc #1\\#2@@@{\def\toname{#1}\def\toaddress{#2}}
  211. \long\def\@yproc #1\\#2@@@{\def\toaddress{#2}}
  212. \def\stopbreaks{\interlinepenalty \@M
  213.  \def\par{\@@par\nobreak}\let\\=\@nobreakcr
  214.  \let\vspace\@nobreakvspace}
  215. \def\@nobreakvspace{\@ifstar{\@nobreakvspacex}{\@nobreakvspacex}}
  216. \def\@nobreakvspacex#1{\ifvmode\nobreak\vskip #1\relax\else
  217.  \@bsphack\vadjust{\nobreak\vskip #1}\@esphack\fi}
  218. \def\@nobreakcr{\vadjust{\penalty\@M}\@ifstar{\@xnewline}{\@xnewline}}
  219. \def\startbreaks{\let\\=\@normalcr
  220.  \interlinepenalty 200\def\par{\@@par\penalty 200}}
  221. % relieken van 'letter'. worden niet gebruikt.
  222. \def\name#1{\def\fromname{#1}}
  223. \long\def\address#1{\def\fromaddress{#1}}\def\fromaddress{}
  224. \def\location#1{\def\fromlocation{#1}}\def\fromlocation{}
  225. \def\telephone#1{\def\telephonenum{#1}}\def\telephonenum{}
  226. \def\returnaddress{}
  227. \def\document{\endgroup
  228.  \@colht\textheight \@colroom\textheight \vsize\textheight
  229.  \columnwidth\textwidth \@clubpenalty\clubpenalty
  230.  \if@twocolumn \advance\columnwidth -\columnsep
  231.  \divide\columnwidth\tw@ \hsize\columnwidth \@firstcolumntrue
  232.  \fi
  233.  \hsize\columnwidth \linewidth\hsize
  234.  \begingroup\@floatplacement\@dblfloatplacement\endgroup
  235.  \if@filesw \immediate\openout\@mainaux=\jobname.aux
  236.  \immediate\write\@mainaux{\string\startlabels\string\@startlabels}\fi
  237.  \def\do##1{\let ##1\@notprerr}
  238.  \@preamblecmds
  239.  \let\do\noexpand
  240.  \@normalsize\everypar{}}
  241. \def\enddocument{\@checkend{document}\newpage\begingroup
  242.  \if@filesw \immediate\closeout\@mainaux
  243.  \makeatletter\input \jobname.aux\clearpage
  244.  \fi\endgroup\deadcycles\z@\@@end}
  245. \def\makelabels{\@fileswtrue}\let\maaketiketten=\makelabels
  246. \def\@startlabels{}
  247. \newcount\labelcount
  248. %%%%%%%%%%%%%%%%%%%%%%%% adresveld %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  249. \newdimen\adresveldbreedte 
  250. \newif\if@antwoordadres
  251. \def\antwoordadres#1{\@antwoordadrestrue\def\@antwoordadres{#1}}
  252. \def\@antwoordadres{}
  253. \def\adresveld{\hbox{}\kern-\topskip
  254.     \bgroup\baselineskip=0pt %% dit voorkomt tonnen problemen.
  255.            \lineskip=0pt     %% tonnetjes.
  256.      \if@adresrechts \adresveldbreedte=4\refveldbreedte
  257.          \advance\adresveldbreedte by -76mm
  258.          \def\@tempa{\moveright 76mm} 
  259.          \else \let\@tempa\relax \adresveldbreedte=83mm\fi
  260.      \setbox\@tempboxa= % geadresseerde plus adres
  261.             \vtop{\hsize=\adresveldbreedte \@normalsize
  262.                   \rightskip=0cm plus \adresveldbreedte
  263.                   \let\\=\@nobreakcr \toname \\ \toaddress}
  264.      \if@antwoordadres\@tempa\vbox to 0cm{
  265.             \hbox to \adresveldbreedte{\kleinvet 
  266.             \def\\{\unskip\enspace$\bullet$\enspace\ignorespaces}%
  267.             \@antwoordadres\hfil}\kern2pt
  268.             \hrule \vss}\fi
  269.      \if@typhulp \@tempa\llap{\vbox to 0cm
  270.                     {\vskip9mm\streepje\vss}} \fi
  271.      \kern9mm \kern-\ht\@tempboxa \@tempdima=\dp\@tempboxa 
  272.      \@tempa\box\@tempboxa \kern-\@tempdima
  273.      \vskip31mm
  274.     \egroup}
  275. %%%%%%%%%%%%%%%%%%%%%% referentieregel %%%%%%%%%%%%%%%%%%%%%%%%%%
  276. \newdimen\refveldbreedte 
  277. \refveldbreedte=38mm %% 3/2 inch. zie NEN 3516
  278. \def\@defrefveld#1#2#3{\setbox#1=\@refveld{#2}{#3}}
  279. \def\@refveld#1#2{\vtop{\hsize=\refveldbreedte \parskip=0cm
  280.                         \lineskiplimit=0cm \baselineskip=12pt
  281.                         \rightskip=0cm plus \refveldbreedte
  282.                                        minus .5\refveldbreedte
  283.                         \vbox{\refkopfont\baselineskip=10pt #1\strut}
  284.                         #2}}
  285. \newbox\@UB \newbox\@UK \newbox\@OK \newbox\@Dt 
  286. \def\uwbriefvan#1{\@defrefveld{\@UB}{\uwbrieftekst}{#1}}
  287. \def\uwkenmerk #1{\@defrefveld{\@UK}{\uwkenmerktekst}{#1}}
  288. \def\onskenmerk#1{\@defrefveld{\@OK}{\onskenmerktekst}{#1}}
  289. \def\datum#1{\def\@tempa{}\def\@tempb{#1}\ifx\@tempa\@tempb
  290.     \setbox\@Dt\hbox{ }\else\@defrefveld{\@Dt}{\datumtekst}{#1}\fi}
  291. %V Datum word geinitialiseerd op \vandaag in \brief
  292. %V als de gebruiker verder niets doet, als hij een leeg argument opgeeft
  293. %V verschijnt er in het geheel geen datum.
  294. \def\referentieregel{\hbox
  295.              {\hbox to \refveldbreedte{\copy\@UB\hfil}%
  296.               \hbox to \refveldbreedte{\copy\@UK\hfil}%
  297.               \hbox to \refveldbreedte{\copy\@OK\hfil}%
  298.               \hbox to \refveldbreedte{\copy\@Dt\hfil}\hss}}
  299. \newbox\@Ad %V Geadresseerde: geinitialiseerd in \brief
  300. \def\vervolgreferentieregel{\hbox
  301.              {\hbox to \refveldbreedte{\copy\@Ad\hfil}%
  302.               \hskip\refveldbreedte
  303.               \hbox to \refveldbreedte{\copy\@Dt\hfil}%
  304.               \@refveld{\bladnummertekst}{\thepage}\hss}}
  305. %%%%%%%%%%%%%%%%%%%%%%%%% headers / footers %%%%%%%%%%%%%%%%%%%%%%%
  306. \def\briefhoofd{}\def\vervolghoofd{\vbox{}}
  307. \def\maakbriefhoofd
  308.    {\@ifstar {\@kortvervolgbriefhoofd}{\@langvervolgbriefhoofd}}
  309. \def\@kortvervolgbriefhoofd
  310.    #1#2{
  311.     \@maakbriefhoofd{#1}{#2}
  312.     \def\vervolghoofd{\vbox{\hsize=4\refveldbreedte
  313.                          \hbox to \hsize{\Large \sf #1\strut\hfil}
  314.                          \hrule \kern2mm \vervolgreferentieregel}}}
  315. \def\@langvervolgbriefhoofd
  316.    #1#2{
  317.     \@maakbriefhoofd{#1}{#2}
  318.     \def\vervolghoofd{\vbox{\briefhoofd\vskip2mm
  319.                         \vervolgreferentieregel
  320.                         \vbox{}}}}
  321. \def\@maakbriefhoofd#1#2{\def\briefhoofd{%
  322.        \vbox{\hsize=4\refveldbreedte 
  323.              \hbox to \hsize{\Large \sf #1\strut\hfil}
  324.              \hrule
  325.              \moveright 3\refveldbreedte\@refveld{\strut #2}{}
  326.              \vbox{}}}}
  327. \newbox\@voetruimte \setbox\@voetruimte=\hbox{}
  328. \newcount\@voetteller
  329. \def\voetregel{\copy\@voetruimte}
  330. \def\voetitem#1#2{\advance\@voetteller by 1
  331.     \setbox\@voetruimte=\hbox to 4\refveldbreedte
  332.            {\unhbox\@voetruimte 
  333.             \ifcase\@voetteller \relax \or \relax \or 
  334.                                 \hfil \else \hfill \fi
  335.             \@refveld{#1}{#2}\hskip0cm plus 3\refveldbreedte}}
  336. \def\ps@empty{
  337.     \def\@oddhead{}\def\@oddfoot{}
  338.     \def\@evenhead{}\def\@evenfoot{}}
  339. \def\ps@plain{
  340.     \def\@oddhead{}\def\@evenhead{}
  341.     \def\@oddfoot{\rm\hfil\thepage}
  342.     \let\@evenfoot=\@oddfoot}
  343. %% hss omdat de kop en voet te breed zijn.
  344. \def\@hss{\hskip 0cm plus 1filll minus 1filll\relax}
  345. \def\ps@headings{
  346.     \def\@oddhead{\vbox to \@otherheadheight
  347.                       {\vervolghoofd\vfill
  348.                        \if@streepjes\streepjes{\@otherheadheight}\fi}%
  349.                   \hss}
  350.     \let\@evenhead=\@oddhead
  351.     \def\@oddfoot{\voetregel\hss} \let\@evenfoot=\@oddfoot}
  352. \def\ps@firstpage{\global\headheight=\@otherheadheight
  353.     \global\textheight=\@othertextheight
  354.     \global\headsep=\@otherheadsep
  355.     \def\@oddhead{\vbox to \@firstheadheight
  356.                       {\briefhoofd\vfill
  357.                        \if@streepjes\streepjes{\@firstheadheight}\fi}%
  358.                   \hss}
  359.     \def\@evenhead{}
  360.     \def\@oddfoot{\voetregel\hss} \let\@evenfoot=\@oddfoot}
  361. \ps@headings
  362. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% vouwstreepjes %%%%%%%%%%%%%%%%%%%%%%%%%%
  363. %% momenteel alleen envelop EN-DL-V geimplementeerd
  364. \def\streepje{\hbox to 2mm{\hrulefill}}
  365. \def\streepjes#1{\vbox to 0cm
  366.          {\kern-#1 %% dit brengt ons bovenin het briefhoofd, 13mm onder
  367.           \hbox to \textwidth                 %% de rand van het papier
  368.              {\llap{\perfstreepje\kern24mm}\hfill %% 7mm van rand op 33mm
  369.               \rlap{\kern24mm\vouwstreepjes}}     %% 7mm van rand op 33mm
  370.           \vss}}                              %% zie textwidth boven.
  371. \def\perfstreepje {\vtop{\kern\z@
  372.                          \kern 135mm %% 297/2 - 13
  373.                          \streepje}}
  374. \def\vouwstreepjes{\vtop{\kern\z@
  375.                          \kern 92mm %% 105-13
  376.                          \streepje  %% denk maar dat dit geen dikte heeft
  377.                          \kern 50mm %% 155-150
  378.                          \streepje}}
  379. %%%%%%%%%%%%%%%%%%%%%%%%%%%% lists %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  380. % overgenomen uit 'artikel3'
  381. \def\@listi{\leftmargin\leftmargini
  382.             \labelsep=.5em
  383.             \labelwidth=\leftmargin \advance\labelwidth by -\labelsep
  384.  \topsep=-.5\parskip %V half the amount of white around lists
  385.  \parsep \z@ %V defaults added
  386.  \itemsep \parsep}    %V defaults added
  387. \def\@listii{\leftmargin\leftmarginii \labelsep=.5em
  388.  \labelwidth\leftmarginii\advance\labelwidth-\labelsep
  389.  \topsep=-.5\parskip %V half the amount of white around lists
  390.  \parsep \z@ %V zeroed
  391.  \itemsep \parsep}
  392. \def\@listiii{\leftmargin\leftmarginiii \labelsep=.5em
  393.  \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
  394.  \topsep=-.5\parskip %V half the amount of white around lists
  395.  \parsep \z@ 
  396.  \partopsep \z@ %V zeroed
  397.  \itemsep \topsep}
  398. \def\@listiv{\leftmargin\leftmarginiv \labelsep=.5em
  399.  \topsep=-.5\parskip %V half the amount of white around lists
  400.  \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
  401. \def\@listv{\leftmargin\leftmarginv \labelsep=.5em
  402.  \topsep=-.5\parskip %V half the amount of white around lists
  403.  \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
  404. \def\@listvi{\leftmargin\leftmarginvi \labelsep=.5em
  405.  \topsep=-.5\parskip %V half the amount of white around lists
  406.  \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}
  407. \leftmargini 2.5em
  408. \leftmarginii 2.2em \leftmarginiii 1.87em 
  409. \leftmarginiv 1.7em \leftmarginv 1em
  410. \leftmarginvi 1em
  411. \leftmargin\leftmargini
  412. \labelwidth\leftmargini\advance\labelwidth-\labelsep
  413. \labelsep 5pt
  414. \parsep 0pt
  415. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% varia %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  416. \parskip .7em plus .3em minus .2em
  417. \parindent 0pt \topsep .4em \partopsep 0pt \itemsep .4em
  418. \@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
  419. \@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
  420. -\@lowpenalty
  421. \def\labelenumi{\arabic{enumi}.}
  422. \def\theenumi{\arabic{enumi}}
  423. \def\labelenumii{(\alph{enumii})}
  424. \def\theenumii{\alph{enumii}}
  425. \def\p@enumii{\theenumi}
  426. \def\labelenumiii{\roman{enumiii}.}
  427. \def\theenumiii{\roman{enumiii}}
  428. \def\p@enumiii{\theenumi(\theenumii)}
  429. \def\labelenumiv{\Alph{enumiv}.}
  430. \def\theenumiv{\Alph{enumiv}}
  431. \def\p@enumiv{\p@enumiii\theenumiii}
  432. \def\labelitemi{$\bullet$}
  433. \def\labelitemii{\bf --}
  434. \def\labelitemiii{$\ast$}
  435. \def\labelitemiv{$\cdot$}
  436. \def\verse{\let\\=\@centercr
  437.  \list{}{\itemsep\z@ \itemindent -15pt\listparindent \itemindent
  438.  \rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}
  439. \let\endverse\endlist
  440. \def\quotation{\list{}{\listparindent 1.5em
  441.  \itemindent\listparindent
  442.  \rightmargin\leftmargin}\item[]}
  443. \let\endquotation=\endlist
  444. \def\quote{\list{}{\rightmargin\leftmargin}\item[]}
  445. \let\endquote=\endlist
  446. \def\descriptionlabel#1{\hspace\labelsep \bf #1}
  447. \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
  448.  \let\makelabel\descriptionlabel}}
  449. \let\enddescription\endlist
  450. \def\theequation{\arabic{equation}}
  451. \arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt
  452. \tabbingsep \labelsep
  453. \skip\@mpfootins = \skip\footins
  454. \fboxsep = 3pt \fboxrule = .4pt
  455. \def\footnoterule{\kern-1\p@
  456.  \hrule width .4\columnwidth
  457.  \kern .6\p@}
  458. \long\def\@makefntext#1{\noindent \hangindent 5pt\hbox
  459.  to 5pt{\hss ${\@thefnmark}$}#1}
  460. \c@topnumber=2
  461. \def\topfraction{.7}
  462. \c@bottomnumber=1
  463. \def\bottomfraction{.3}
  464. \c@totalnumber=3
  465. \def\textfraction{.2}
  466. \def\floatpagefraction{.5}
  467. \c@dbltopnumber= 2
  468. \def\dbltopfraction{.7}
  469. \def\dblfloatpagefraction{.5}
  470. \smallskipamount=.5\parskip \medskipamount=\parskip
  471. \bigskipamount=2\parskip
  472. \pagenumbering{arabic} \onecolumn \@fileswfalse
  473. %%%%%%%%%%%%%%%%%%%%%%%%%% labels %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  474. \def\startlabels{\labelcount=0 \baselineskip=0pt \lineskip=0pt
  475. \pagestyle{empty}
  476. \let\@texttop=\relax
  477. \topmargin -50pt
  478. \headsep 0pt
  479. \oddsidemargin -35pt
  480. \evensidemargin -35pt
  481. \textheight 10in
  482. \@colht\textheight \@colroom\textheight \vsize\textheight
  483. \textwidth 550pt
  484. \columnsep 25pt
  485. \xpt
  486. \baselineskip=0pt
  487. \lineskip=0pt
  488. \boxmaxdepth=0pt
  489. \twocolumn\relax}
  490. \def\mlabel#1#2{\setbox0\vbox{\parbox[b]{3.6in}{\strut\ignorespaces #2}}
  491.  \vbox to 2in{\vss \box0 \vss}}
  492. %%%%%%%%%%%%%%%%%%%%%%%%%%% talen %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  493. \ifcase\language % 0: Nederlands
  494.    \def\uwbrieftekst{Uw brief van}
  495.    \def\uwkenmerktekst{Uw kenmerk}
  496.    \def\onskenmerktekst{Ons kenmerk}
  497.    \def\datumtekst{Datum}
  498.    \def\geadresseerdetekst{Geadresseerde}
  499.    \def\bladnummertekst{Bladnummer}
  500.    \def\vandaag{\number\day~\ifcase\month\or
  501.      januari\or februari\or maart\or april\or mei\or juni\or juli\or
  502.      augustus\or september\or oktober\or november\or december\fi
  503.      \space \number\year}
  504.    \def\betrefttekst{Onderwerp:}
  505.    \def\bijlagetekst{Bijlage:}
  506.    \def\bijlagentekst{Bijlagen:}
  507.    \def\telefoon{telefoon}   
  508. \or % 1: Engels
  509.    \def\uwbrieftekst{Your letter of}
  510.    \def\uwkenmerktekst{Your reference}
  511.    \def\onskenmerktekst{Our reference}
  512.    \def\datumtekst{Date}
  513.    \def\geadresseerdetekst{To}
  514.    \def\bladnummertekst{Page}
  515.    \def\vandaag{\ifcase\day\or
  516.        1st\or 2nd\or 3rd\or 4th\or 5th\or
  517.        6th\or 7th\or 8th\or 9th\or 10th\or
  518.        11th\or 12th\or 13th\or 14th\or 15th\or
  519.        16th\or 17th\or 18th\or 19th\or 20th\or
  520.        21st\or 22nd\or 23rd\or 24th\or 25th\or
  521.        26th\or 27th\or 28th\or 29th\or 30th\or
  522.        31st\fi~\ifcase\month\or
  523.        January\or February\or March\or April\or May\or June\or
  524.        July\or August\or September\or October\or November\or December\fi
  525.        \space \number\year}
  526.    \def\betrefttekst{Re:}
  527.    \def\bijlagetekst{Enclosure:}
  528.    \def\bijlagentekst{Enclosures:}
  529.    \def\telefoon{telephone}
  530. \or % 2: Amerikaans
  531.    \def\uwbrieftekst{Your letter of}
  532.    \def\uwkenmerktekst{Your reference}
  533.    \def\onskenmerktekst{Our reference}
  534.    \def\datumtekst{Date}
  535.    \def\geadresseerdetekst{To}
  536.    \def\bladnummertekst{Page}
  537.    \def\vandaag{\ifcase\month\or
  538.      January\or February\or March\or April\or May\or June\or
  539.      July\or August\or September\or October\or November\or December\fi
  540.      \space\number\day, \number\year}
  541.    \def\betrefttekst{Re:}
  542.    \def\bijlagetekst{Enclosure:}
  543.    \def\bijlagentekst{Enclosures:}
  544.    \def\telefoon{telephone}
  545. \or % 3: Duits
  546.    \def\uwbrieftekst{Ihr Brief von}
  547.    \def\uwkenmerktekst{Ihr Zeichen}
  548.    \def\onskenmerktekst{Unser Zeichen}
  549.    \def\datumtekst{Datum}
  550.    \def\geadresseerdetekst{An}
  551.    \def\bladnummertekst{Zettel}
  552.    \def\vandaag{\number\day.~\ifcase\month\or
  553.      Januar\or Februar\or M\"arz\or April\or Mai\or Juni\or
  554.      Juli\or August\or September\or Oktober\or November\or Dezember\fi
  555.      \space\number\year}
  556.    \def\betrefttekst{Betrifft:}
  557.    \def\bijlagetekst{Anlage:}
  558.    \def\bijlagentekst{Anlagen:}
  559.    \def\telefoon{Telephoon}
  560. \fi
  561. % et qui parle Fran\c{c}ais, nowadays?
  562. %% and finally, muchos against my will, emulation of original
  563. %% LaTeX letter style.
  564. \let\letter=\brief \let\endletter=\endbrief
  565. \let\closing=\afsluiting
  566. \def\signature{\ondertekening}
  567. \let\encl=\bijlagen
  568. \def\address#1{\maakbriefhoofd*{}{#1}}
  569. \let\re=\betreft
  570.